Super League/Super League.iso/TUTORIAL/CURSO/WHERE.DXR/00020.ls

Text File | 1997-03-25 | 976 b | 43 lines

on enterFrame
  global var1, var2
  if chars(var2, 6, 6) = "1" then
    set the visible of sprite 30 to 1
  end if
  if chars(var2, 6, 6) = "2" then
    set the visible of sprite 31 to 1
  end if
  if chars(var2, 6, 6) = "3" then
    set the visible of sprite 32 to 1
  end if
  if chars(var2, 6, 6) = "4" then
    if var1 < 6 then
      set the visible of sprite 33 to 1
    end if
    if (var1 <= 21) and (var1 > 5) then
      set the visible of sprite 34 to 1
    end if
    if var1 > 21 then
      set the visible of sprite 35 to 1
    end if
  end if
  if chars(var2, 6, 6) = "5" then
    if var1 <= 72 then
      set the visible of sprite 36 to 1
    end if
    if (var1 <= 77) and (var1 > 72) then
      set the visible of sprite 37 to 1
    end if
    if (var1 <= 81) and (var1 > 77) then
      set the visible of sprite 38 to 1
    end if
    if var1 > 81 then
      set the visible of sprite 39 to 1
    end if
  end if
end

on exitFrame
  general()
  go(#loop)
end